/ Apple Student Resource Set 1994 / Student Resource Set.iso / Demonstrations / Content / cover.MMM / cover.MMM.rsrc / STXT_1025

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 0c 00 00 05 49 | 00 00 00 de 2d 2d 20 6c |.......I|....-- l|
|00000010| 6f 63 61 6c 20 6d 61 63 | 72 6f 73 0d 0d 6d 61 63 |ocal mac|ros..mac|
|00000020| 72 6f 20 73 68 6f 77 42 | 75 62 62 6c 65 48 65 6c |ro showB|ubbleHel|
|00000030| 70 20 77 68 69 63 68 53 | 70 72 69 74 65 0d 20 20 |p whichS|prite.  |
|00000040| 20 20 67 6c 6f 62 61 6c | 20 73 74 61 72 74 42 61 |  global| startBa|
|00000050| 63 6b 54 68 65 72 65 0d | 20 20 20 20 67 6c 6f 62 |ckThere.|    glob|
|00000060| 61 6c 20 75 73 65 46 61 | 73 74 43 6f 6e 74 72 6f |al useFa|stContro|
|00000070| 6c 73 0d 20 20 20 20 67 | 6c 6f 62 61 6c 20 62 75 |ls.    g|lobal bu|
|00000080| 62 62 6c 65 48 65 6c 70 | 53 70 72 69 74 65 0d 0d |bbleHelp|Sprite..|
|00000090| 0d 20 20 20 20 0d 0d 6d | 61 63 72 6f 20 66 6c 61 |.    ..m|acro fla|
|000000a0| 73 68 54 69 74 6c 65 0d | 20 20 20 20 73 65 74 20 |shTitle.|    set |
|000000b0| 74 68 65 20 70 75 70 70 | 65 74 20 6f 66 20 73 70 |the pupp|et of sp|
|000000c0| 72 69 74 65 20 32 20 74 | 6f 20 54 52 55 45 0d 20 |rite 2 t|o TRUE. |
|000000d0| 20 20 20 73 65 74 20 74 | 65 6d 70 4e 75 6d 20 3d |   set t|empNum =|
|000000e0| 20 74 68 65 20 63 61 73 | 74 4e 75 6d 20 6f 66 20 | the cas|tNum of |
|000000f0| 73 70 72 69 74 65 20 32 | 0d 20 20 20 20 73 65 74 |sprite 2|.    set|
|00000100| 20 74 65 6d 70 4e 75 6d | 45 6e 64 20 3d 20 74 65 | tempNum|End = te|
|00000110| 6d 70 4e 75 6d 20 2b 20 | 37 0d 20 20 20 20 73 65 |mpNum + |7.    se|
|00000120| 74 20 63 6f 75 6e 74 65 | 72 20 3d 20 74 65 6d 70 |t counte|r = temp|
|00000130| 4e 75 6d 0d 20 20 20 20 | 72 65 70 65 61 74 20 77 |Num.    |repeat w|
|00000140| 68 69 6c 65 20 63 6f 75 | 6e 74 65 72 20 3c 3d 20 |hile cou|nter <= |
|00000150| 74 65 6d 70 4e 75 6d 45 | 6e 64 0d 20 20 20 20 20 |tempNumE|nd.     |
|00000160| 20 20 20 73 65 74 20 74 | 68 65 20 63 61 73 74 4e |   set t|he castN|
|00000170| 75 6d 20 6f 66 20 73 70 | 72 69 74 65 20 32 20 74 |um of sp|rite 2 t|
|00000180| 6f 20 63 6f 75 6e 74 65 | 72 0d 20 20 20 20 20 20 |o counte|r.      |
|00000190| 20 20 73 65 74 20 63 6f | 75 6e 74 65 72 20 3d 20 |  set co|unter = |
|000001a0| 63 6f 75 6e 74 65 72 20 | 2b 20 31 0d 20 20 20 20 |counter |+ 1.    |
|000001b0| 20 20 20 20 6d 6f 76 65 | 48 61 6e 64 50 6f 69 6e |    move|HandPoin|
|000001c0| 74 65 72 0d 20 20 20 20 | 65 6e 64 20 72 65 70 65 |ter.    |end repe|
|000001d0| 61 74 0d 20 20 20 20 73 | 65 74 20 63 6f 75 6e 74 |at.    s|et count|
|000001e0| 65 72 20 3d 20 74 65 6d | 70 4e 75 6d 45 6e 64 0d |er = tem|pNumEnd.|
|000001f0| 20 20 20 20 72 65 70 65 | 61 74 20 77 68 69 6c 65 |    repe|at while|
|00000200| 20 63 6f 75 6e 74 65 72 | 20 3e 3d 20 74 65 6d 70 | counter| >= temp|
|00000210| 4e 75 6d 0d 20 20 20 20 | 20 20 20 20 73 65 74 20 |Num.    |    set |
|00000220| 74 68 65 20 63 61 73 74 | 4e 75 6d 20 6f 66 20 73 |the cast|Num of s|
|00000230| 70 72 69 74 65 20 32 20 | 74 6f 20 63 6f 75 6e 74 |prite 2 |to count|
|00000240| 65 72 0d 20 20 20 20 20 | 20 20 20 73 65 74 20 63 |er.     |   set c|
|00000250| 6f 75 6e 74 65 72 20 3d | 20 63 6f 75 6e 74 65 72 |ounter =| counter|
|00000260| 20 2d 20 31 0d 20 20 20 | 20 20 20 20 20 6d 6f 76 | - 1.   |     mov|
|00000270| 65 48 61 6e 64 50 6f 69 | 6e 74 65 72 0d 20 20 20 |eHandPoi|nter.   |
|00000280| 20 65 6e 64 20 72 65 70 | 65 61 74 0d 20 20 20 20 | end rep|eat.    |
|00000290| 73 65 74 20 74 68 65 20 | 70 75 70 70 65 74 20 6f |set the |puppet o|
|000002a0| 66 20 73 70 72 69 74 65 | 20 32 20 74 6f 20 46 41 |f sprite| 2 to FA|
|000002b0| 4c 53 45 0d 20 20 20 20 | 72 65 70 65 61 74 20 77 |LSE.    |repeat w|
|000002c0| 68 69 6c 65 20 72 6f 6c | 6c 4f 76 65 72 28 32 29 |hile rol|lOver(2)|
|000002d0| 0d 20 20 20 20 20 20 20 | 20 6d 6f 76 65 48 61 6e |.       | moveHan|
|000002e0| 64 50 6f 69 6e 74 65 72 | 0d 20 20 20 20 65 6e 64 |dPointer|.    end|
|000002f0| 20 72 65 70 65 61 74 0d | 0d 6d 61 63 72 6f 20 63 | repeat.|.macro c|
|00000300| 68 65 63 6b 48 6f 74 73 | 70 6f 74 73 0d 20 20 20 |heckHots|pots.   |
|00000310| 20 67 6c 6f 62 61 6c 20 | 62 75 62 62 6c 65 48 65 | global |bubbleHe|
|00000320| 6c 70 4f 6e 0d 20 20 20 | 20 67 6c 6f 62 61 6c 20 |lpOn.   | global |
|00000330| 62 75 62 62 6c 65 48 65 | 6c 70 53 70 72 69 74 65 |bubbleHe|lpSprite|
|00000340| 0d 20 20 20 20 67 6c 6f | 62 61 6c 20 63 75 62 65 |.    glo|bal cube|
|00000350| 53 70 72 69 74 65 0d 20 | 20 20 20 67 6c 6f 62 61 |Sprite. |   globa|
|00000360| 6c 20 63 75 62 65 52 6f | 74 61 74 6f 72 53 70 72 |l cubeRo|tatorSpr|
|00000370| 69 74 65 0d 20 20 20 20 | 67 6c 6f 62 61 6c 20 68 |ite.    |global h|
|00000380| 61 6e 64 50 6f 69 6e 74 | 65 72 53 70 72 69 74 65 |andPoint|erSprite|
|00000390| 0d 20 20 20 20 67 6c 6f | 62 61 6c 20 75 73 65 4c |.    glo|bal useL|
|000003a0| 65 66 74 48 61 6e 64 50 | 6f 69 6e 74 65 72 0d 20 |eftHandP|ointer. |
|000003b0| 20 20 20 67 6c 6f 62 61 | 6c 20 75 73 65 46 61 73 |   globa|l useFas|
|000003c0| 74 43 6f 6e 74 72 6f 6c | 73 0d 0d 20 20 20 20 67 |tControl|s..    g|
|000003d0| 6c 6f 62 61 6c 20 66 6f | 75 6e 64 48 6f 74 53 70 |lobal fo|undHotSp|
|000003e0| 6f 74 0d 0d 20 20 20 20 | 69 66 20 72 6f 6c 6c 4f |ot..    |if rollO|
|000003f0| 76 65 72 28 32 29 20 74 | 68 65 6e 20 66 6c 61 73 |ver(2) t|hen flas|
|00000400| 68 54 69 74 6c 65 0d 0d | 20 20 20 20 69 66 20 72 |hTitle..|    if r|
|00000410| 6f 6c 6c 4f 76 65 72 28 | 37 29 20 74 68 65 6e 20 |ollOver(|7) then |
|00000420| 73 65 74 20 66 6f 75 6e | 64 48 6f 74 53 70 6f 74 |set foun|dHotSpot|
|00000430| 20 3d 20 37 0d 0d 20 20 | 20 20 69 66 20 72 6f 6c | = 7..  |  if rol|
|00000440| 6c 4f 76 65 72 28 31 31 | 29 20 74 68 65 6e 20 73 |lOver(11|) then s|
|00000450| 65 74 20 66 6f 75 6e 64 | 48 6f 74 53 70 6f 74 20 |et found|HotSpot |
|00000460| 3d 20 31 31 0d 0d 20 20 | 20 20 69 66 20 72 6f 6c |= 11..  |  if rol|
|00000470| 6c 4f 76 65 72 28 31 33 | 29 20 74 68 65 6e 20 73 |lOver(13|) then s|
|00000480| 65 74 20 66 6f 75 6e 64 | 48 6f 74 53 70 6f 74 20 |et found|HotSpot |
|00000490| 3d 20 31 33 0d 0d 20 20 | 20 20 69 66 20 6e 6f 74 |= 13..  |  if not|
|000004a0| 20 66 6f 75 6e 64 48 6f | 74 53 70 6f 74 20 74 68 | foundHo|tSpot th|
|000004b0| 65 6e 0d 20 20 20 20 20 | 20 20 20 6e 6f 72 6d 61 |en.     |   norma|
|000004c0| 6c 48 61 6e 64 0d 20 20 | 20 20 20 20 20 20 68 69 |lHand.  |      hi|
|000004d0| 64 65 42 75 62 62 6c 65 | 48 65 6c 70 0d 20 20 20 |deBubble|Help.   |
|000004e0| 20 65 6c 73 65 0d 20 20 | 20 20 20 20 20 20 69 66 | else.  |      if|
|000004f0| 20 66 6f 75 6e 64 48 6f | 74 53 70 6f 74 20 3c 3e | foundHo|tSpot <>|
|00000500| 20 39 39 20 74 68 65 6e | 20 68 6f 74 48 61 6e 64 | 99 then| hotHand|
|00000510| 0d 20 20 20 20 20 20 20 | 20 69 66 20 62 75 62 62 |.       | if bubb|
|00000520| 6c 65 48 65 6c 70 4f 6e | 20 74 68 65 6e 20 73 68 |leHelpOn| then sh|
|00000530| 6f 77 42 75 62 62 6c 65 | 48 65 6c 70 20 66 6f 75 |owBubble|Help fou|
|00000540| 6e 64 48 6f 74 53 70 6f | 74 0d 20 20 20 20 65 6e |ndHotSpo|t.    en|
|00000550| 64 20 69 66 0d 00 0b 00 | 00 00 00 00 0c 00 0a 00 |d if....|........|
|00000560| 03 00 00 00 09 00 00 00 | 00 00 00 00 00 00 03 00 |........|........|
|00000570| 0c 00 0a 00 03 01 00 00 | 09 00 00 00 00 00 00 00 |........|........|
|00000580| 00 00 11 00 0c 00 0a 00 | 01 00 00 00 09 00 00 00 |........|........|
|00000590| 00 00 00 00 00 00 17 00 | 0c 00 0a 00 01 01 00 00 |........|........|
|000005a0| 09 00 00 00 00 00 00 00 | 00 00 26 00 0c 00 0a 00 |........|..&.....|
|000005b0| 01 00 00 00 09 00 00 00 | 00 00 00 00 00 00 31 00 |........|......1.|
|000005c0| 0c 00 0a 00 01 01 00 00 | 09 00 00 00 00 00 00 00 |........|........|
|000005d0| 00 00 32 00 0c 00 0a 00 | 01 00 00 00 09 00 00 00 |..2.....|........|
|000005e0| 00 00 00 00 00 00 91 00 | 0c 00 0a 00 01 01 00 00 |........|........|
|000005f0| 09 00 00 00 00 00 00 00 | 00 00 9c 00 0c 00 0a 00 |........|........|
|00000600| 01 00 00 00 09 00 00 00 | 00 00 00 00 00 02 f3 00 |........|........|
|00000610| 0c 00 0a 00 01 01 00 00 | 09 00 00 00 00 00 00 00 |........|........|
|00000620| 00 03 01 00 0c 00 0a 00 | 01 00 00 00 09 00 00 00 |........|........|
|00000630| 00 00 00                |                         |...     |        |
+--------+-------------------------+-------------------------+--------+--------+